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Calendário Personalizado 
Transforme seu CP 400 num charmoso professor de francês 
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O CP 200S éo parceiro 
ideal dos iniciantes. 
Com ele você 
desenvolve as primeiras 
lições em computação. 
Qualquer criança pode utilizá 

lo para resolver tarefas 
escolares ou simplesmente 


O professor idea 
para os iniciantes 


no mundo da 
informática. 
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curtir os mais divertidos jogos 
de vídeo-game. 
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Prova dos Noves, para conferir listagens 
em Basic no CP 400 Color .... 9e 10 





Feira Internacional de Informática 85 cumpriu sua missão. Revelou para 
a sociedade todas as opções e tendências tecnológicas para o mercado, 
demonstrando as soluções e funções possíveis e viáveis que a 
informática pode possibilitar para todas as 

atividades profissionais, educacionais, domésticas e de lazer. 

Mais do que isso, demonstrou o amadurecimento tecnológico e científico 
no desenvolvimento industrial e o da própria comunidade usuária. 

Porém, o futuro da informática no Brasil vai além do simples sucesso 
institucional ou comercial alcançado neste evento. Hoje, mais do que 
nunca, são fundamentais a compreensão da importância da soberania da 
política de defesa dos valores nacionais e o justo apoio às universidades 
e instituições de pesquisas — pois este é o caminho para o efetivo 
desenvolvimento da tecnologia nacional. 

Mais uma vez, o grupo Prológica assume a vanguarda desse setor, 
abrindo espaço para a pesquisa e solidificando a relação 
indústria/universidade, com o convênio Prológica/Universidade de São 
Paulo para o desenvolvimento de supermicros — apostando no trabalho 
dos pesquisadores das universidades e no futuro da informática no Brasil. 


Carlos Roberto A. Gauch 
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mática 85 cumpriu sua missão, 
revelando para à sociedade aa 
das as opções € end o 
mercado de informatica. E 
páginas 4,5,6€ 7 as principal 
estrelas do stand da Prológica. 


Calendário Personalizado para os usuá- 
rios do CP 300 e CP 500, três progra- 
mas educacionais para você transfor- 
mar seu CP 400 Color num charmoso 
professor de francês e a última parte da 
listagem em Basic do programa Trinô- 
mio do 2º Grau, para o CP 200. 
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CURSOS 


YM Consultoria de Sistemas — 
Oferece os seguintes cursos: Basic; 
dBase 1; Lotus 1, 2 e 3; Supercalc 
HI, Wordstar e Basic Infantil, Mais 
informações: em São Paulo, tel,: 
(011) 66.9233/825.2708; no Rio de 
Janeiro, tel,: (021) 239,1345. 


senac Informática — Olerece men- 
salmente cursos de programação € 
operação de computador para em- 
presários, executivos, profissionais 
liberais, secretárias, redatores e jorna- 
listas, administradores, economistas, 
estatísticos e contabilistas, estudantes 
tri e profissionais de todas as áreas. 
RO) | 1 Mais informações podem ser obtidas 
a dá | pelo telefone (011) 256.5522, ramal 

dent E 460. O Senac Informática fica na 
Rua Dr. Vila Nova, 288 — 5º andar 
— São Paulo — SP, 





DIRETOR 
Corlos Roberto 4, Gouch 


EDITORA 
Morta Regina de Souza 


Banco de Dados — Metodologia de 
Projeto de Sistema em Banco de Da- 
dos — Data: 9 e 10) de dezembro. Lo- 
cal: Intertec — Av. Paulista, 2439 
— 9º andar — São Paulo — SP — 
tel.: (011) 259.2055, ramal 319. 


COLABORADORES 

Departamento de Software 

do CP Computadores Pessoais Ltda, 
Hélio Laurindo dos Santos 


PRODUÇÃO EDITORIAL 


Sonia Aparecida do Silva Gráficos — Aplicações Comerciais 


e Administrativas — Data: 5 de de- 
zembro. Local: Intertec — Av. Pau- 
lista, 2439 — 9º andar — São Pau- 
lo — SP — tel.: (011) 259.2055, ra- 
mal 319. 


REVISÃO 
Sueli À. Mozre Cerchioro 


DEPARTAMENTO DE ARTE 
Diogramação: Wilson Roberto Thomaz 
Arte Final: Sebastião Nogueira 
Projacs | — Básico Sistema de Con- 
trole e Análise de Projeto — Data: 
2a 4 de dezembro, Local: Intertec 
— Av, Paulista, 2439 — 9º andar 
— São Paulo — SP — tel.: (011) 
259.2055, ramal 319, 


PRODUÇÃO GRÁFICA 
Vogner Vizioli 


DEPARTAMENTO COMERCIAL 
Gerente: Ivon Jubert Guimarões 
Assinatura: Vero Lúcio Marques de Jesus 


DEPARTAMENTO DE PUBLICIDADE 
João Conte Filho 


dBase II — Datas: 9 a 13 de dezem- 
bro; 16 a 20 de dezembro; 6a 10 de 
janeiro; 13 a 17 de janeiro; 27 a 31 
de janeiro; 3 a 7 de fevereiro; 17 a 
21 de fevereiro e 24 a 27 de feverei- 
ro. Local: Datalógica — Av. Pau- 
lista, 2028 — 16º andar — São 
Paulo — SP — tel.: (011) 283,0355. 


Composição: AM. Produções Gráficos Ltda, 
Fotolitos Priscor Ltda, 
Impressão: Cio. Lithogróphica Ypiranga 


Geração Prológica é uma publicoção da EDITELE — Edito- 
ro Técnico Eletrônico Lida. — Redação, Administração e Pu- 
blicidade: Rua Cosa do Ator, 1060. Telefones: 5472.0609 (As- 
sinoturos), 5391-5443 (Administração), 5392.1655 (Publicidade! 
é 240-8305 (Redação) — CEP 04546 — Vila Olimpia. 
CAIXA POSTAL 30.14] — 01000 — São Paulo — SP, 
Tirogem desta edição: 22.000 exemplores. 

Todos os direitos reservados: proibe-se o reprodução par- 
cial ou total dos textos e ilustroções desta publicação. Proi- 
bida o vendo, seporodomênte, do encorte especial de 
programas 


dBase HI — Datas: 2 a 6 de dezem- 
bro; 16 a 20 de dezembro; 13 a 17 


de janeiro; 20 a 25 de janeiro; 27 a 
31 de janeiro; 3 a 7 de fevereiro; 
17 a 21 de fevereiro; 24 a 28 de fe- 
vereiro. Local: Datalógica — Av, 
Paulista — 2028 — 16º andar — 
São Paulo — SP — tel.: (011) 
283.0355. 


Framework — Datas: 2 à 6 de de- 
zembro; 6 a 10 de janeiro; 3 a 7 de 
fevereiro. Local: Datalógica — Av. 
Paulista, 2028 — 16º andar — São 
Paulo — SP — tel.: (011) 283.0355. 


São Paulo Computer Institute — 
Oferece Os seguintes cursos para o 
mês de dezembro: Introdução à Mi- 
croinformática: dias 2 e 3, das 8:30 
as 17:30, Preço 35 ORTN's. Intro- 
dução ao dBase IH (Intensivo): dias 
12 e 13, das 8:30 às 17:30, Preço: 
35 ORTN's. Programando em dBa- 
se Il: de 9a 11, das 8:30 às 17:30. 
Preço: 50 ORTN's. Introdução ao 
Lotus 1-2-3: dias 5 e 6, das 8:30 às 
17:30, Preço: 45 ORTN's. Lotus 
1-2-3 Avançado: dias 13, das 8:30 às 
17:30, Preço: 25 ORTN's. Introdu- 
ção ao dBase HI (Intensivo): dias 2 
a 5, das 18:00 às 22:00. Preço: 40 
ORTN's. Programando em dBase 
HI (Intensivo): dias 18 e 19, das 8:30 
as 17:30. Preço: 45 OR TN's. Intro- 
dução ao dBase HI: de 2 a 4, das 
8:30 às 17:30. Preço: 60 ORTN's. 
Sistema Operacional MS-DOS: dias 
ll e 12. Carga horária: 16 horas. 
Preço: 45 ORTN's. Redes Locais 
de Microcomputadores: dia 20, 
Carga horária: 20 horas. Preço: 25 
ORTN's. O Microcomputador na 
Estratégia e no Planejamento Em- 
presarial; dias l6 e 17, das 8:00 às 
18:00. Preço: 70 ORTN's, Planeja- 
mento e Decisão Utilizando Banco 
de Dados Públicos: dia 4, das 8:00 
as 18:00, Preço: 35 OR TN's. O Mi- 
crocomputador na Estratégia e no 
Planejamento de Marketing: dias 9 
e 10, das 8:00 às 18:00. Preço: 80 
ORTN's. Mais informações podem 
ser obtidas pelo tel.: (011) 883.0355 
ou na Avenida Rebouças, 1669 — 
São Paulo — SP. 
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Cirandão no CP 400 





No último número da revista Gera- 
ção Prológica conheci o novo CP 400 
Color II. Gostaria de saber se é possíi- 
vel o acesso ao projeto Cirandão, da 
Embratel, através deste computador. 

Marco Aurélio Spohn — 
Giruá — R$ 





Caro Marco, o CP 400 Co- 
lor II possibilita o acesso a qualquer 
banco de dados, inclusive o Cirandão. 
Para tanto, você precisa somente de 
um modem, telefone, software especi- 
fico (desenvolvido pela empresa) e ins- 
crição na Embratel. Boa sorte! 
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POKE 








Assino a revista Geração Prológica 
e gostaria de comunicar-lhes o quanto 
estou satisfeito com ela. Possuo um 
CP 400 Color e adorei aqueles coman- 
dos POKESs publicados na GP 13 e a 
Planilha Eletrônica publicada na GP 
12. Gostaria de pedir a vocês que, se 
possível, publicassem um jogo de si- 
mulador de vôo ou um de caratê. Su- 
ponho que esses programas sejam fei- 
tos em linguagem de máquina (tor- 
nando assim difícil sua publicação) e 
agradeceria se vocês me dissessem se há 
cartuchos ou fitas à venda com esses 
jogos e onde posso adquiri-los. Gos- 
taria de saber ainda se há algum co- 
mando que permita usar em alta reso- 
lução todas as cores juntas. Tenho cer- 
teza de que poderão me auxiliar. 
João P Lunardelli — S. André — SP 


Caro João, na GP nº 14 publicamos 
uma série de software-houses (e respec- 
tivos endereços) onde você poderá en- 
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contrar os jogos que lhe interessam. 
Quanto ao comando para alta resolu- 
ção no CP 400, informamos que exis- 
te um modo semigráfico que opera em 
oito cores, com utilização de POKES. 
No entanto, este método é altamente 
sofisticado, exigindo uma pesquisa 
mais elaborada para sua explicação. 
Aguarde uma matéria a respeito nos 
próximos números. 


Jogos para CP 300 


Prezados senhores, tenho um com- 
putador CP 300 e sou assinante da re- 
vista Geração Prológica. Desde o 
lançamento do CP 400, esta revista 
não tem publicado aplicativos, jogos 
ou cursos para o CP 300. Isso me pre- 
judica, bem como a todos os usuários 
que possuem o mesmo equipamento. 
Gostaria de ter mais material para o 
CP 300 através da GP. Peço ainda que 
me orientem com relação a cursos de 
programação adequados à minha ida- 
de e formação escolar (7º série do 1º 
Grau). | 

Daniel Alberto Vaena — 
Rio de Janeiro — RJ 


Companheiro Daniel, seu protesto 
está registrado. Mas, apesar de pouco, 
temos publicado sempre informações 
e programas compatíveis com o 
CP 300 e CP 500. Neste número, por 
exemplo, além de informações técni- 
cas, você tem uma listagem em Basic 
para elaborar seu próprio calendário. 
Quanto aos cursos, consulte a nossa se- 
ção Agenda ou o Senac Informática 
do Rio de Janeiro. 


+ 


GBASIC para CP 500 








Venho acompanhando esta revista 
desde o seu primeiro número e estou 
muito satisfeto com suas matérias e 
programas, além do espaço que vocês 
dão aos leitores. Gostaria de saber se 
a placa de alta resolução do CP 500 
necessita de algum software para ser 
utilizada. Também gostaria de saber 
como ativar o modo gráfico ponto a 
ponto da impressora P 500. 

Dennis M. Laguna — Dourados — MS 


Caro Dennis, a empresa que fabri- 


ca a placa de alta resolução para ser 
acoplada ao CP 500 é a PSI — Proje- 
to e Serviços em Informática Indústria 
e Comércio Ltda. —, que fica na Ave- 
nida Pavão, 346 — Indianópolis — SP 
— tel.: 533.0120 ou 533.0112. Informa- 
mos ainda que o sistema operacional 
é o mesmo do CP 500, porém para 
programar em AR você terá que adqui- 
rir o software GBasic. Quanto ao mo- 
do gráfico ponto a ponto na 
impressora P 500, para ativá-lo você 
deverá digitar a seguinte instrução: 
LPRINT CHR$(27); CHR$(37); 
CHR£$%(48). Para o avanço da linha a 
instrução a ser digitada é: LPRINT 
CHR$(10) ou LPRINT CHR$(13). Pa- 
ra sair do modo gráfico ponto a pon- 
to a instrução é: LPRINT CHR$(27); 
CHR$(13). 





Cortesia I 


Os nossos agradecimentos pelo per- 
manente esforço na nobre missão de 
informar e o reconhecimento pela con- 
tribuição efetiva como instrumento e 
garantia do desenvolvimento. 
Um abraço amigo de 

Maia Farina — Assessoria 
Empresarial — São Paulo — SP 





Cortesia II 





Sou assinante da revista Geração 
Prológica e estou muito feliz em po- 
der fazer parte das informações pres- 
tadas pela GP. Espero que vocês 
continuem no pique de fazer sempre o 
melhor para nós, leitores. 

No começo eu estava meio inseguro 
com a revista, mas agora ela está sen- 
sacional. 

Continuem, pois tenho certeza de 
que não é só eu que está adorando a 
GP. 

Mauro Sergio Franco da Costa — 

Campinas — SP 
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A Feira Internacional de Informáti- 
ca 85 foio maior acontecimento politi- 
co, institucional e comercial do setor. 
Tanto que o vice-presidente Ulysses 
Guimarães, na condição de presidente 
interino (José Sarney estava na ONU no 
dia da abertura da Feira), onze minis- 
tros, o governador do Estado de São 
Paulo, Franco Montoro, o prefeito da 
cidade, Mario Covas, e várias outras 
autoridades participaram da solenida- 
de deabertura do evento. O próprio se- 
nador Fernando Henrique Cardoso, 
presente na comitiva presidencial, ao 
comentar a importância do apoio à in- 
dústria nacional de computação, lem- 
brou que, dos stands visitados, tinha 
notado que o único a levantar bem alto 
a bandeira RESERVA DE MERCADO 
tinha sido o da Prológica. “Um ato po- 
lítico oportuno, frente aos últimos 


À Editele 
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livros na 
Informática |-. 
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CP 400 

e Dicionário |: 
Essencial de 
Eletrônica. 
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acontecimentos” (ataque do presiden- 
te dos Estados Unidos, Ronald Reagan, 
à política brasileira de reserva de mer- 
cado), afirmou o senador. 

Mas a Prológica foi além da conduta 
política, trazendo para os 480 metros 
quadrados de seu stand a comunidade 
de informática para participar dos 
avanços tecnológicos conquistados pela 
empresa em toda sua linha de compu- 
tadores pessoais e profissionais — a 
mais completa do País, abrangendo dos 
equipamentos de uso doméstico, como 
o CP 200, aos sofisticados 16 bits, co- 
mo o SP-l6. 


Carlos Roberto Gauch, vice-presidente da Prológica, entrega um 
CP 400 para Ulysses Guimarães, presidente interino, 


SP-16 e CP 400 Color, 
as estrelas da Feira 


Para demonstrar a eficiência do SP-16, 
a Prológica colocou à disposição dos vi- 
sitantes um super SP, cinco vezes maior 
do que o tamanho padrão, acoplado a 
um telão de 2 x 1,5 metros, fornecendo 
informações gerais sobre a Feira, sobre 
a empresa, além de demonstrações de 
aplicativos e jogos. 

Mas se o super SP-16 foi o sucesso 
profissional da Feira, a linha de com- 
putadores pessoais foi a grande estrela 
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A CP realizou 
diariamente 
sorteio de 
computadores 
em seu stand, 


para os milhares de visitantes do stand. 
Com a participação de inúmeras 
software-houses credenciadas, foram 
colocadas à disposição dos usuários to- 
das as possibilidades do CP 200, CP 400 

Color II, CP 500 e a impressora P 500. 
as 2 400 Color, com seu novo tecla- 
| do profissional, demonstrou sua poten- 
| cialidade com vários softwares aplica- 
| tivos, utilitários e jogos, sendo que as 
| grandes sensações foram os programas 










software-houses, Os acessórios e perifé- 
ricosConversor Serial;e Comutadorde 






TLX-500 Sistema Micro-Telex, para o 
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| Color Max e Digitalizador, na área de | 


| Saída Serial, para o CP 400 Color, e o | 


| CP 500, na área de hardware-houses. 








REPORTAGEM DE CAPA, 


COLOR MAX, o programa 
que transforma o CP 400 
em um artista 

Color Max é um programa gráfico al- 
tamente sofisticado, com recursos en- 
'contrados anteriormente apenas em 
equipamentos maiores e de maior custo. 
| Ele permite aos usuários do CP 400Co- 
lor as mesmas facilidades de uma pran- 
cheta de desenho, tais como traçado de 
linhas livres ou retas, círculos, elipses, 
quadrados, pintura em 60 cores e pa- 
drões diferentes — e tudo isso usando 


[apenas o joystick. 


Mas o Color Max foi além da pran- 
cheta, com suas funções exclusivas de 
zoom parcial detela, que permite otra- 
balho ponto a ponto para a correção de 
erros e retoques, de spray, que produz 
efeitos de focos de luz em objetos, de 
| edição parcial, que possibilita a dupli- 
cação de partes opcionais da tela, a edi- 
ção ca combinação das cores e padrões. 

Todas essas possibilidades são viáveis 
apenas com o uso do joystick, que con- 
'trola uma pequena seta que pode andar 
por todo o vídeo na escolha das funções 
de lápis, borracha, pincel e spray, en- 
tre outras. O mais importante é que as 
telas são completamente independen- 
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tes, podendo ser chamadas por outros 
programas e armazenadas em disco ou 
fita. Este programa foi desenvolvido e 
produzido pela Novatec Indústria e Co- 
mércio, do Rio de Janeiro, e está sendo 
comercializado pela Medical Color 
Soft. 
DIGITALIZADOR, 
o editor de imagens 

Também fez sucesso o protótipo do 
Digitalizador — um hardware, acom- 
panhado de um software (em fase de 
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testes), que permite captar imagens ge- 
radas por uma câmara de TV ou video- 


cassete e transformá-las em informação 


binária para a tela de alta resolução do 
CP 400. Através desta operação, você 
pode manipular a imagem de qualquer 
forma, como impressão, transforma- 
ções e edições parciais ou completas. 


HARDWARE-HOUSES 





A potencialidade da linha de compu- 
tadores pessoais da Prológica foi de- 
monstrada também coma participação 
de fabricantes de acessórios, periféricos 
e suprimentos. A Microequipamentos, 
por exemplo, apresentou toda sua linha 
de cabos, software e periféricos — es- 
tes ultimos voltados para o CP 400 Co- 
lor: o Conversor Serial Paralelo, que 
converte a saída serial do computador 
em saida paralela, e o Comutador de 
Saida Serial, que permite duplicar a sai- 
da serial do CP 400, para a utilização 
de dois periféricos seriais. 





CP 500, 
o computador que é um telex 





O microcomputador CP 500 foi cha- 
mado de “Bom Bril” da informática 
na Feira,pois apresentou mile umauti- 
lidades através de seu poderoso hard- 
ware, vasta biblioteca de software e vá- 
rios periféricos. Agora, além de cum- 
prir com eficiência qualquer tarefa que 
você imaginar, eletambém pode ser um 
versátil telex, através do TLX-500 Sis- 
tema Micro-Telex, desenvolvido pela 
Data Comércio Indústria e Representa- 
ções. Com este equipamento, o CP 500 
permite que você tenha um sistema de 
microcomputador operando também 
como telex com rapidez, economia ese- 
gurança. O TLX-500 é uma interface 
aliada a um software, que transforma 
os sinais ASC em BAUDOT e vice- 
versa, fazendo com que o computador 





Es 





E: 


passe a operar na rede internacional e 
nacional de telex. 


Dentre as muitas vantagens que este 
sistema, aliado à linha de computado- 
res com tecnologia Prológica, oferece 
à automação de escritórios, podemos 
destacar as seguintes: fácil manuseio e 
instalação, recebimento automático de 
mensagens, conexão com a rede nacio- 
nale mundial de telex, possibilidade de 
formatação e correção de textos antes 
de serem transmitidos e outros recursos 
do editor de textos, multiendereça- 
mento/mala direta via telex, atendi- 
mento de chamada, ligando e desligan- 
do automaticamente, e processamento 
direto de dados recebidos via telex. 


Este sistema pode ser conectado ain- 
daasredes RENPAC, VIDEOTEXTO, 
ARUANDA, DISQUEBOLSA, CI- 


& 
a sia 


== ESTA LUA ===] 





RANDÃO, ou outros bancos de dados 
em operação, 

Para Fabio Mendia, diretor de ope- 
rações da CP Computadores Pessoais, 
a Feira veio acelerar a informatização 
da sociedade, com o conhecimento e a 
multiplicação das soluções que possibi- 
litam os computadores. 





REPORTAGEM DE CAPA mu 










dadas 


| O stand da Prológica apresentou toda a sua linha 
e foi um dos mais visitados na Feira. 





Color Max e 
Digitalizador, 
os editores 
de imagem 
mais famosos 
do mundo, 
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Fabio Mendia, diretor da CP Computa- 
dores Pessoais. 
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NOVAS PERFORMANCES 
PARA DIRETÓRIO E 
S.0. DO CP 500 





dio! ab a AE 


Os usuários do CP 500 
que utilizam o DOS500 já 


RASELADEENDEREGOSA | eme 


de um disco que contenha 





Se você é um programador criativo, aproveite esta dica uma quantidade razoável de 
para desenvolver uma série de aplicações para o seu programas e/ou arquivos. 
CP 400, utilizando esta simples tabela de endereços, cujo A dica abaixo melhora o 
conteúdo indica que tecla foi pressionada. | comando DIR, garantindo 


que ele mostre os arquivos 
do diretório no formato normal, mas apenas uma página 
por vez. Se houver muitos arquivos, ao completar uma tela, 


a x E Ê ç : : ER a listagem será interrompida, a mensagem “pressione 
E] jm E) e oa Ú É p 
240 ERES (jr ia 7 2 BREAK ENTER para continuar” será emitida e o micro ficará 
341 Comet; 18 3 aguardando que o operador informe se deseja continuar 
J42 EP ISAR s] 4 a listagem; e, assim, sucessivamente, até que todos os ar- 
Es 3 HM y : x quivos existentes no disco tenham sido apresentados. 
345 G O W Espaço 7 Para conseguir esse efeito, devemos executar as seguin- 


| tes alterações no Sistema Operacional: 
| Conteúdo |254 253 251 247 239 223 191 


Se nenhuma tecla for pressionada, o conteúdo de todos | | PATCH "6 (ADD =61TI,FIND = 0DO000,CHG = 202003) 


d ê E PATCH “6 (ADD = 616D, FIND = CDB861B7C8FE40,CHG = 3ABO3FDE20CECD) 
os endereços será 255. Para você ter certeza de que tudo PATCH “6 (ADD = 6174,FIND = 2806C547AF78C1,CHG = CF60CDCI01AFCS) 


está certo, confira a tabela com o seguinte programa: 


10 PRINT(GO,;:FOR X=338 TO 345;PRINT PEEKIX);NEXT:GOTO 10 | Uma outra dica que pode ser bastante útil: alteração no 

| sistema operacional com relação ao modo como este acei- 

ta os comandos. Esta conduta permitirá que, estando em 

“DOS500 Ativo” e pressionando a tecla ENTER, o últi- 

ra mo comando DOS digitado seja repetido automaticamente, 

G RAVAÇÃO EM DISCO | Esta alteração permitirá ainda que comandos DOS sejam 

| digitados indiferentemente em letra maiúscula ou minús- 

cula. Outra vantagem é que o SO ignorará todos os co- 
mandos DOS que iniciem com um ponto (.). 

Apesar de parecer inútil, existe uma aplicação para este 
efeito: quanda estamos eriando um arquivo BUILD, ele 
é executado automaticamente pelo Sistema Operacional, 

Como um comando precedido de um ponto não é in- 
terpretado, a mensagem aparecerá na tela e poderá servir : 
de comentário para o usuário, além do que se poderá es- 
crever o que se desejar, pois o Sistema Operacional não 
verifica a sintaxe do que é escrito após o ponto. 

Para se conseguir esses três efeitos, deve-se fazer a se- 


Uma dúvida que muitos usuários do CP 400 devem ter 
refere-se ao modo como se deve proceder para ler um pro- 
grama em linguagem de máquina, que está gravado em fi- 
ta cassete, e gravá-lo corretamente em disco usando o 
comando SAVEM, onde devem ser fornecidos os endere- 
ços de início, final e execução do programa. Para obtê- 
los, primeiramente carregue o programa gravado em fita 
com o comando CLOADM, 

A seguir, use as seguintes instruções: 


INICIO ... o... PRINT PEEK(487)' 256 + PEEK(488 : E : 
FINA PAINT ERA EE Rio! guinte alteração no Sistema Operacional: 
| EXECUCAO ...................... PRINT PEEK(157)' 256 + PEEK(158) 
va = ! | FIRE: | ne PATCH “0 (ADD = 4CD1,FIND = 204E53,CHG = 4E530D) | 
Salve o programa em disco com a instrução: | PATCH *1 (ADD =4E32 FIND=212542112642,CHG = 1808773E1BCD) 
SAVEM''nomearq”, início, fim, execução PALOH UI dODE AESA FIND = OISFocaMoE Han HO 
Dai em diante, basta carregar O programa dodiscopara | | paTCH "1 (ADD =4EAO FIND = 2040E548060009,CHG = 142891 7EFE6138) 
a memoria com LOADM e colocá-lo em funcionamento | PATCH *1 (ADD =4EA7,FIND = 01400087ED4222 CHG = 03D620772310F5) 
com EXEC. | PATCH *1 (ADD = 4EAE,FIND = 20403E1ECD3300,CHG = DIE17E12FEZEÇA) 


PATCH “1 (ADD =4EB5,FIND = E1222040C1E1,CHG = 4A4EFEDD28BF) 


aa o Gis PATCH *1 (ADD =4E9B,FIND = 28ADC3BB4E,CHG = 11D4 
Sidnei Stifelmann ' bag ni ; E Sora 
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“é 


SUPORTE 


PARA-CONFERIR LISTAGENS-NO-CP-400-COLOR 


Uma das coisas mais importantes ao se trabalhar com o microcomputador é, 
sem dúvida, o método. Não se pode pensar em tirar o máximo proveito de uma 
ferramenta tão sofisticada, sem que se tenha um método eficiente para isso. Por 
método, entendemos todas aquelas providências que devemos tomar e etapas que 
devemos cumprir para atingir nossos objetivos, quer seja introduzindo, editando, 
conferindo ou executando um determinado programa. Nesse artigo, apresentamos 
um utilitário para agilizar a conferência das listagens, utilizando a velha e infalível 


prova dos noves. 


ntes de começar a 
explorar os recur- 
sos de seu com- 
putador pessoal, 
quero fazer uma 
pergunta: como é 
que você val saber 
se copiou tudo cer- 
to, sem ter que re- 
visar letra por le- 
tra todo o texto digitado? Você tem 
alguma idéia? Não? Não tem impor- 
tância: Paulo Addair, em seu livro 
Indo Além com o CP 400 Color, já re- 
solveu este problema para nós, desen- 
volvendo o programa PROVA DOS 
NOVES — Para Conferir Listagens. 

Certos erros de digitação são mui- 
to dificeis de detectar. E necessário um 
método completo para se decretar: “A 
Inha 12434 está errada!” 

No caso de listagens, o programa 
PROVA DOS NOVES cumpre o seu 
papel, conferindo o trabalho do digi- 
tador. Na verdade, a antiga prova dos 
noves, em computação, se transforma 
em prova dos 255, que é o mesmo processo, só que apli- 
cando a base numérica do computador: o byte. Como em 
aritmética “humana” a base é dez e a prova é dos “'no- 
ves”, se usarmos o valor máximo do byte, 256, a prova 
deverá ser dos 255. 

Como você deve saber, toda a informação armazenada 
no micro está representada por valores numéricos na me- 
mória, representados pelos bytes. Isso vale também para 
O programa, que fica codificado numa determinada parte 
da memória destinada só para ele. Assim, se queremos ter 
a prova dos noves de um programa, basta somarmos os 


x 1 + 
F Ea 
ne TF 
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conteúdos na memória e, toda vez que se ultrapassar 255, 
subtrairmos esse valor do resultado. No final, teremos um 
valor representativo de cada linha e de todo o programa, 


PROGRAMA 


Além de calcular e mostrar a prova de todas as linhas, 
este programa fornece a prova dos noves para cada grupo 
de dez linhas. Não há restrição quanto à complexidade das 
linhas, podendo estas terem múltiplas instruções separa- 
das por dois pontos. A única restrição é quanto à nume- 





EE 


> da 





ração das linhas, que não pode exceder a 62999, pois 
rotina da prova começa em 63000. 

Para assegurar a exatidão de suas listagens, siga os se- 
guintes passos: 

1. Certifique-se de que o seu programa está rodando sem 
problemas. 

2. Acrescente a rotina da prova dos noves, digitando-a no 
final de cada programa. 

3. Chame a rotina com o comando RUN 63000. 

4. Anote os valores para cada linha e/ou os valores para 
os blocos de dez linhas, como aparecem na tela. 

5. Insira no final de cada linha o valor correspondente à 
mesma. Use para isso a instrução EDIT (subcomando X), 
colocando um apóstrofo seguido do valor da prova até 
aquela linha. 

Esse procedimento não deve ser adotado em linhas com 
instruções DATA. Nesse caso, é melhor fazer o próprio 
programa realizar uma soma dos valores na instrução 
DATA e verificar ao final da leitura dos mesmos. 

Com os valores em mãos, identificam-se as linhas onde 
houve erro de digitação, corrige-se através de EDIT e 
torna-se a rodar a rotina da prova (RUN 63000). Repete- 
se este processo até não encontrar mais disparidades entre 
a listagem original e a digitada. 

Esse procedimento permite um método de depuração 
bastante prático, principalmente quando o programa pos- 
sui uma listagem muito longa ou complexa, Você não pre- 
cisa necessariamente usá-lo, podendo até — a partir dele 
— chegar a um outro, ainda melhor! 


DEIXE O SEU CP500 
FALAR MAIS. 


40 novas instruções 


Enriqueça o vocabulário BASIC do seu | 
TAS (CP500 e compativeis), com dO novas | 
instruções dedicadas a parte gráfica. que 
darão ao BASIC do seu equipamento uma | 
nova dimensão. 


PREÇO 12 ORTNS 


DEIXAR DE TER ESTE SOFTWARE 


Para os possuidores de uma impressora 
PSD0, este sotiware permite explorar a sua 
capacidade gráfica implementando uma 
tela lógica de alta resolução reconfigurá- 
vol em até 3680 = 3680 pontos A 


GRAFICOS GERADOS PELO NEWBASIC 
NA IMPRESSORA P500 


Desejo n recober o soltware NEWBASIC 
assinalado no anúncio. 


jo Mediante envio de cheque nominal a DISCON 
[| rm DIST. DE COMP. E SERV. LTDA 
jo porte é por nossa conta e sua encomenda 
[| | | chega mais rápido) 
A Cheque... “ 


| Mediante pagamento contra recebimento 
Di ibuicã | do software pelo reembolso postal, 
stri Liçãode Computadores | acrescido de despesas postais 
e Serviços Ltda. 
Rua lihgus. 126 Casa — Parque Cruz Aguiar 
Rio Vermelho — CEP 40000 — - 
TEL: OF -2ast2o4 Salvador. BA | Cidada 


Rotina da Prova dos Noves 


63000 CL=PEEK(Z5) XZ356+PEEK(Z6) 
63010 CLS:BN=BN+1:BT=B:PRINT" LI| 
NHA", "PROVA" Ss PRINT o 
63020 FOR I=1i TO 10:LN=PEEK(CL+Z | 


JX25S6+PEEK(CL+3) | 
63030 IFLI<6300B THEN PRINTLN.:N| 
L=PEEK(CL)x256+PEEK(CL+1) 2:ELSEI=| 
11:G0TO 63060 ty 
653046 FOR J=CL+ê TO NL-L:IF PEEK| 
(J)=58 AND PEEK(J+1)=131 THEN J=[ 
NL:ELSE CS=CS+PEEK(J): IFCS>254TH| 
ENCS=CS-255 E 
63050 NEXTJ:PRINTCS:CL=NL:BT=BT+ | 
cs k: 
63060 NEXTI=zIFLN<63000THENPRINTA || 
-29 ""sPRINTH-Z,» "LINHA:"sLN,CSs:PRIO 
INTH-Z,"" ELSE PRINTH-E. "FIM: "HO 
s CS: END | 
63078 INPUT"PRESSIONE QUALQUER 
ECLA"sET:GOTO 63018 


FIM: Cis 





Receba 
em sua casa 


| as mais 
| atualizadas 
| Informações 


sobre seu 
computador 


pessoal. 


ASSINE E LEIA 











REPORTAGEM 


uma paixão que virou CLUBE 


do tem sede, não 
tem estatuto, não 
exige jóia ou qualquer tipo de mensali- 
dade e sequer faz publicidade. Mas au- 
mentou seu número de sócios para 250, 
espalhados por todo o Brasil e unidos 
por uma paixão comum: as 1 001 pos- 
sibilidades do micro colorido. E o Co- 
lor Clube, voltado para incrementar o 
prazer de “trabalhar” com um CP 400 
Color e que pretende contribuir com 
muitas idéias para explorar ao máximo 
o potencial do equipamento. 





Pioneirismo 

Tudo começou em 1981, quando 
Francisco Correa da Silva, especialista 
em marketing da Xerox do Brasil, ad- 
quiriu um TRS 80 Color, recém-lan- 
cado nos EUA, 

“Fiquei navegando no mar de quem 
não conhecia nada de computador”, 
lembra ele, ressaltando que na época o 
termo informática sequer existia. A par- 
tir dai, Francisco conseguiu “colocar na 
cabeça” de um amigo a idéia de trazer 
um equipamento igual ao seu — “que 
era razoavelmente barato e até certo 
ponto revolucionário, com caracteris- 
ticas de computador de maior porte”. 
Juntos, trabalharam com o micro e, em 
1982, “descobriram” outro adepto, Al- 
fredo Troncoso, em Campinas, que es- 
tava num estágio idêntico em termos de 
conhecimento sobre o Color. “Resol- 
vemos juntar esforços e fazero TRS Co- 
lor Clube, e assim fomos conhecendo 
pessoas igualmente interessadas”, lem- 
bra Francisco. 
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Do TRS ao CP 400 Color 


Francisco lembra que, desde aquela 
época, as atividades do clube baseavam- 
se na emissão de um boletim com infor- 
mações, trocas de programas, vendas de 
serviços e tudo o que dizia respeito à ex- 
ploração do potencial do micro. “Em 
nosso clube, engenheiros e técnicos as- 
sociados podem, por exemplo, aumen- 
tar a capacidade de memória, fazer li- 
gações, alterações, às vezes por um pre- 
co simbólico, às vezes até de graça. Iro- 
camos também programas para o mi- 
CrOs 


Foi a partir de 84 que o mercado se 
aqueceu. “A Prológica foia mola pro- 
pulsora”, salienta Francisco. '* Até en- 
tão, existiam três companhias no mer- 
cado fabricando compatíveis com o 
TRS 80, mas não souberam aproveitar 
a vantagem de pioneiros. Com a entra- 
da da Prológica no mercado, uma com- 
panhia de peso e visão, surgiram 1 001 
opções. Tanto que, dos 500 usuários 
desse tipo de micro — entre nacionais 
e importados —, passamos agora para 
30 mil.” 


Hoje, o Color Clube já possui 30% 
de seus associados com equipamento 
CP 400 Color. “Ele é versátil, tem re- 
solução gráfica, som, cores, música, 
oferecendo a melhor relação custo/be- 
nefício. Podemos fazer misérias com 
ele”, entusiasma-se Francisco. E acres- 
centa: “Sea Prológica souber ouvir os 
seus usuários, ela tem grande futuro 
com essa máquina no Brasil, que é o uni- 
co país, atualmente, onde existem com- 
pativeis Color”. 


Comunicação 

O Color Clube continua tendo sua al- 
ma no boletim — que passou a bimes- 
tral temporariamente por problemas fi- 
nanceiros. Mas Francisco pretende 
transformá-lo em uma publicação inde- 
pendente ou mesmo em um encarte den- 
tro de outra publicação, para expandir 
a comunicação, sempre de maneira in- 
formal. '“A maioria dos usuários caren- 
tes de informações está fora do Rio de 
Janeiro ou de São Paulo, e acho que 
nosso boletim preenche essas necessida- 
des. Eu respondo, sem fazer nenhuma 
propaganda do Color Clube, em média, 
a 10 cartas por dia” — salienta, Fran- 
cisco, frisando que não recebe nada pa- 
ra exercer a “presidência” do clube. 
““Acho que um CP tem de ser mais pra- 
zer que obrigação e, na verdade, o que 
faço é coordenar 250 pessoas, não pre- 
sidir.” 

Os sócios desse clube informal pa- 
nham uma carteirinha simbólica e, pa- 
ra receber (se quiserem) o boletim — 
que se chama até hoje TRS 80 Color 
Clube Boletim —, pagam apenas 5 mil 
cruzeiros por exemplar. 

Além de toda a troca de informa- 
ções, programas, dicas de mercado, di- 
cas técnicas, o Color Clube também tem 
um projeto “Cirandinha”, um correio 
eletrônico que funciona das 20 às 24 ho- 
ras, de 2º a 6º feira, para mensagens, 
boletins, colocação de programas dis- 
poniveis etc, 

O endereço para correspondência do 
TRS 80 Color Clube é Caixa Postal 2951 
— Rio de Janeiro — CEP: 20001 — 
A/C de Francisco Correa. 
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Jogo do bicho 









DEU CP 500 NA CABEÇA 





O banqueiro, entrevistado pelo vei- 
culo, compara o jogo a uma empresa, 
convencido de que a administração de 
parte de seus negócios fica mais efi- 
ciente com o computador. Tanto que 
comprou um CP 500 e utilizou dez 
programas desenvolvidos por sua se- 
cretária, para controlar o movimento 
de apostas nas bancas. 

“O processo de automatização da 
sociedade é incontrolável e até atinge 
redutos artesanais como o jogo do bi- 
cho”, afirma Wilson Moherdaui, edi- 
tor do Informática Hoje. Segundo ele, 


Jogo do bicho por computador! 

| Quem diria que a popular “'fezinha” 
seria controlada também pela infor- 
mática. O jornal semanal Informáti- 
ca Hoje, de São Paulo, localizou no 


Rio de Janeiro um banqueiro que 
usa computador para verificar o 
movimento de apostas em seus 287 
pontos, onde trabalham mais de 
3 mil pessoas. 


os banqueiros já sereuniram com pla- 
no de informatizar todo o processo de 
jogo, embora ainda não abram mão 
da confiabilidade de alguns processos 
manuais. 


Sistema 700 coordena Congresso Eucaristico 


A Terra não é o centro do universo 
ea tendência mundial é a total informa- 
tização da Igreja. Afirmações como es- 
ta, ou mesmo insinuações a respeito, le- 
varam muita gente para a fogueira. Li- 
teralmente. Mas isto, há muitos sécu- 
los atrás. Hoje, a Igreja entende a im- 
portância do desenvolvimento tecnoló- 
gico e científico. Tanto que o XI Con- 
gresso Eucarístico Nacional, realizado este ano em Apare- 
cida, São Paulo, foi totalmente coordenado por dois Siste- 
mas 700 e duas impressoras P 720, da Prológica, e softwa- 
res desenvolvidos pela Data Systems Consultoria e Plane- 
jamento de Dados. 

As atribuições dos computadores começaram pela ela- 
boração da listagem dos 4 mil participantes, emissão de cra- 
chás para cada um deles, distribuição do material litúrgico 
e elaboração de hstas de assinaturas para controle da adminis- 
tração do evento. Também coube aos computadores a fun- 
ção de distribuir as autoridades eclesiásticas entre 115 ho- 
téis, quatro conventos e várias casas de devotos, para hos- 
pedagem. 

Além disso, os microcomputadores possibilitaram que 
o padre Antonio da Silva — coordenador do evento — con- 
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po | te nas s respectivas atividades, defeso 
"| nando horários, tarefas e funções espe- 
cificas. 

Ferrenho defensor da informatiza- 
ção da Igreja, padre Antonio, que é pes- 
quisador de teologia administrativa e já 
trabalhou no Canadá em informatiza- 
| ção eclesiástica, acredita mesmo que a 
tendência mundial é a total informatização da Igreja. 

Copérnico, Galileu Galilei, Giordano Bruno e tantos ou- 
tros estão vingados. 


“700, ea 


idade dos envios 
| comunida vao 


ndiç 
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uma rede 
de escolas 
de 


informática 












Mais de 100 com- 
putadores, sendo 
que grande número 
é da linha CP da 
Prológica, classes li- 
mitadas — de forma 
a assegurar um com- 
putador para cada 
dois alunos —, apostilas desenvolvidas 
por uma equipe selecionada e turmas es- | 
peciais para crianças de9a 12 anos. Es- 
tas são algumas das vantagens ofereci- 
das pela SOS Computadores, uma em- 
presa que começou há dois anos atrás 
e que hoje já conta com uma rede de no- 
ve escolas — em São Paulo (Pacaem- | 
bu, Paraíso e Vila Carrão), Guarujá, 
Santos, São Vicente, Tatuí, Jundiaí, 
Sorocaba — e mais de 1 500 alunos. 
Trabalhando com três linguagens — 
' Basic, Cobole Assembler —, a SOS dá 
ainda cursos especiais de aplicativos, 
como o VisiCalc, um software para a 
área técnico-financeira. O curso com- 
pleto de Cobol tem 96 horas/aula; o de 
Assembler, 48 horas, e o de Basic é cum- 
prido em duas etapas: 48 horas/aula na 
| primeira e 24 horas/aula na segunda. 
| —**Procuramos aumentar cada vez 
mais o entrosamento aluno/computa- 
dor””, completa Luiz Carlos Izzo, um 
do sócios da SOS, “e para os que que- | 
| rem testar exercicios, criar programas 
ou simplesmente familiarizar-se mais 
ainda com o micro, criamos o Clube 
SOS. São duas horas, em dias progra- 
mados, em que o aluno — ou o ex-aluno 
— dispõe dos micros para seu uso ex- 
clusivo, gratuitamente”. 
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REA PROJETÓS q! 
; o Pégasus, supermicro de 32 bits, desenvolvido pela Universida- 
federal do Rio de Janeiro, e o robô industrial projetado pelo Cen- 
tro de Computação Eletrônica: da USP foram, respectivamente, o) | 
primeiro e o segundo colocados na premiação instituída pela Abi = 
comp — Associação Brasileira das Indústrias de Computadores e Pe- 
riféricos = para os melhores trabalhos mostrados pelas 26 instituições 
de pesquisa. que, participaram e se Rio Internacional de Intis 3 
mática. ra E: Se DB RR DO, or. a 
As Caracteristicas do robô da USP ermitént sua utilização na ie pe, 
dústria. automobilística, seja para soldagem ou para pintura, € 
colocam-no em posição de igualdade com os projetos de compra de F 
tecnolog ia rec: temente nomDlogAdoS pela Secretaria Especial de das q a 


ni Lo e, 
i ds 
y 





am” 


lógica, para desenvolvimento de vá- 
rios projetos na área de Informática 
e Engenharia. O primeiro deles é o de 
um micromputador de 32 bits, um su- 
permicro, que já está sendo desenvol- 
vido no Laboratório de Subsistemas 
Integráveis da Poli. 

“Esse convênio beneficia tanto a 
empresa quanto a universidade. Para 
a Prológica, o intercâmbio com os 
meios acâdemicos vai de encontro ao 
Plano Nacional de Informática, que 

ps. Te: incentiva a participação das universi- 
Carlos Roberto A. Gauch dades no trabalho desenvolvido pelos 
a fabricantes nacionais de computado- 

E um projeto pioneiro no Brasil:a res. Para a USP, a injeção de recur- 
Prológica e a Escola Politécnica da sos permitirá o prosseguimento de um 
Universidade de São Paulo estão fina- trabalho em tecnologia de ponta”, 
lizando os detalhes para a assinatura afirma Carlos Roberto Gauch, vice- 
de um convênio de cooperação tecno- presidente da Prológica. 








Instituto de Ciência da Computação 


O Departamento de Ciências da Computação, integrado ao Insti- 
tuto de Matemática e Estatística da Universidade Estadual de Cam- 
pinas, São Paulo, será transformado em Instituto de Ciência da 
Computação. Segundo Cláudio Lucchesi, membro do Departamen- 
to, um projeto neste sentido já está sendo examinado pela Reitoria 
da Unicamp. 

Com a transformação em Instituto, será criado o curso de pós- 
graduação a nível de doutorado em Computação e ampliadas as áreas 
de pesquisas existentes, atualmente voltadas para hardware, software, 
teoria e sistemas de informação, introduzindo-se as áreas de inteli- 
gência artificial e processamento de imagens. 
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Desejo receber, adquirir ou trocar números atrasados da 
Geração Prológica. Preciso dos números 1,2,3,5eGete- 
nho os números 7, 10, 11 e 12 para trocar. 


Augusto Valente Neto — Rua Modestino Soares, 960 — 
Bairro Jóquei Clube — CEP: 64.000 — Teresina — PI 


Troco programas com usuários de CP 300 0u CP 500 na 
versão fita cassete. 


Clorivaldo Alves Campos — Avenida Gentil Tavares, 
506 — Bairro Getúlio Vargas — tel.: (079) 222-6000 
CEP: 49.000 — Aracaju — SE 


Nós, do FRIEND's COMPUTERS CLUB, estamos dis- 
postos a aceitar os leitores da excelente revista Geração Pro- 
lógica. Também pedimos sugestões para melhorar a nossa 
associação. Endereço para correspondência: Rua Julio de 
M. Filho, 10-54 — Vila Universitária — CEP: 17,100 — Bau- 
ru — SP, 


Nota da redação: Nós, do Clube CP's, também estamos 
dispostos a receber os FRIEND's como nossos associados. 
Bem-vindos. ; 
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Possuo um computador CP 400 e uma extensa relação 


| de programas entre jogos, aplicativos e programas integra- 
| dos. Gostaria, através desta revista, de criar um Clube de 
| Usuários em São Paulo visando, principalmente, atroca de 
| bons programas, bem como de adquirir (rateando o custo) 


os últimos programas lançados nos Estados Unidos e de real 
interesse do Clube. Peço também uma relação de usuários 


| de CP 400 para convidá-los a integrar o clube, 


Alberto Zagni — Rua Bartolomeu Feio, 190 — tel.: 
(011) 531-5623 (residência) e (011) 270-2322 (comercial) 
CEP: 04580 — São Paulo — SP 


Nota da redação; Seja bem-vindo ao CLUBE CP's, Al- 


berto. O convite para os usuários de CP 400 está feito, mas 
| não estamos autorizados a publicar listas de nomes, a não 
| ser que o leitor assim o deseje. 


Sou assinante da Geração Prológica e tenho acompanha- 
do com bastante interesse a seção CLUBE CP's. Como fa- 
ço para me associar ao referido clube? 


Paulo Antonio Cunha Martins — Rua Mal. Rondon, 
2094 — CEP: 79.100 — Campo Grande — MS 


Nota da redação: Companheiro Paulo, temos a honra 
de informar-lhe que você já é um membro do CLUBE CP's. 
Nosso clube é um espaço conquistado pelos usuários da li- 
nha de computadores pessoais da Prológica e tem como fi- 
losofia a democratização das informações. Essa democra- 
tização pode ser praticada com todos: com a revista, com 
o fabricante e com os outros usuários de microcomputado- 
res. Por isso publicamos seu endereço para troca de infor- 
mações. Escreva sempre. 
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A eficiência na automação em escri- 
tórios tem várias possibilidades, depen- 
dendo das necessidades e da adequação 
dos equipamentos, além da relação 
custo/benefício. Os acessórios e peri- 
féricos cumprem, nestas ocasiões, O 
papel viabilizador de perspectivas pro- 
dutivas através da computação, au- 
mentando o rendimento dos micro- 
computadores. 

Este é o caso do mais novo produto 
que a PSI — Projetos e Serviços em 
Informática — está colocando no mer- 
cado de periféricos: o Freeway, um 
Data Buffer inteligente que atua como 
interface entre um microcomputador 
e uma impressora, armazenando infor- 
mações em alta velocidade e liberan- 
do imediatamente o micro para outras 
atividades. Além de permitir a otimi- 
zação do uso do microcomputador 
(que não irá mais perder tempo con- 
trolando a impressão de relatórios), o 
Freeway possui memória real de 64 Kb 
(ou 65 536 toques), expansivel até 
512 Kb. Porém, essa memória pode 
operar com mais do que o dobro de 
sua capacidade real ou adquirida, já 
que trabalha com armazenamento em 
modo comprimido. 


Características técnicas 
e compatibilidade 
com os CPs 


Totalmente compatível com a linha 
- de computadores pessoais da Prológi- 
ca, o Freeway agiliza e aperfeiçoa as 
relações micro-impressora, apresentan- 
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do características inéditas para o mer- 
cado nacional: oferece estatísticas de 
impressão, permite avanço de páginas, 
controla a troca de papel avulso, fil- 
tra line feed automático, permite inser- 
ção de impressões rápidas em meio a 
grandes relatórios, executa autotestes 
e outras funções que o caracterizam 
como uma interface inteligente. 

Além de apresentar essas caracte- 
rísticas, este Data Buffer permite tam- 
bém a impressão de gráficos, converte 
modos de comunicação paralela em se- 
rial, ou vice-versa, aumenta as distân- 
cias entre os dispositivos sem a neces- 
sidade de modem, libera rapidamente 
linhas telefônicas usadas em transmis- 
sões de listagens a grande distância e 
pode ser ligado a terminais de videos. 

Apesar de todas essas funções, O 
Freeway apresenta-se em gabinete le- 
ve e de dimensões reduzidas, pois foi 
desenvolvido com circuitos integrados 
de alta densidade. 

Para o engenheiro Luiz Carlos Pal- 
miro, diretor de marketing da PSI, a 
principal vantagem do Freeway é que 
ele proporciona um melhor rendimen- 
to de todo o sistema montado a partir 
de um microcomputador: “Um micro 


que demore 30 minutos comandando 
uma impressão poderá realizar essa ta- 


'refa em apenas 40 segundos se auxilia- 


do pelo Freeway, otimizando assim a 
relação custo/benefício do sistema”, 


Alta resolução gráfica 
para o CP 500 


A PSI também desenvolveu a placa 
PSI-GRAF, que transforma o CP 500 
normal em um poderoso microcom- 
putador com alta resolução gráfica 
(512 x 192 pontos) e amplia o vídeo de 
texto para 80 ou 85 colunas. 

Acompanha a PSI-GRAF um dis- 
quete ou uma fita cassete contendo o 
software básico de operação, incluin- 
do uma versão do interpretador Basic 
com extensões especiais para as carac- 
terísticas da placa. 

Além da PSI-GRAF, a empresa de- 
senvolveu vários outros periféricos 
compatíveis com a linha de computa- 
dores pessoais da Prológica: a PSI-300 
IP, interface que permite a ligação de 
uma impressora paralela no CP 300 e 
a PSI-MC, que permite conectar e con- 
trolar vários aparelhos através de um 
CP 200 ou CP 300 ou CP 500. Na 
área de software, a empresa coloca à 
disposição do mercado o SCE — Sis- 
tema de Controle de Estoque. Mas, 
Luiz Carlos Palmiro garante que a PSI 
não pára por aí: nos próximos meses 
estará disponível no mercado o novo 
produto da empresa, um Controlador 
Inteligente para Processos Industriais, 
também compatível com a linha CP. 
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| Indo Além com o CP 4) Color, de Paulo Addair, 144 
páginas, 16x 23 cm, Editele — Editora Técnica Eletrônica. 


Sempre que se fala em literatura para computadores pes- 
soais, pensa-se logo em cursos de programação, quase sem- 
pre Basic, ou então em coletâneas de programas do tipo 


| 
ii 


| 
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“Agenda Telefônica”, ''Orçamento Doméstico” ou, ain- 
da, nos invariáveis jogos “Labirinto” e similares. Raros 
são os livros que se preocupam em explorar melhor os re- 
cursos do equipamento. A preocupação geral é aplicar 
aqueles que são apresentados no próprio manual, através 
de cursos básicos ou então de programas já prontos. 

Os poucos livros que abordam recursos inéditos, quer 
seja revelando detalhes de hardware ou relacionando os 
PEEKs e POKESs mais importantes do equipamento, in- 
variavelmente são escritos de forma sintética, visando so- 
bretudo o programador experiente, que não exige maio- 
res explicações ou exemplos elaborados de utilização do 
recurso apresentado. 

Fugindo um pouco desses lugares-comuns, que carac- 
terizam o mercado de livros nacionais, a EDITELE lan- 
çou na V Feira de Informática, em setembro último, um 
livro destinado ao programador iniciante que aborda re- 
cursos inéditos do CP 400 Color. A intenção dessa obra 
é que “o leitor vá percebendo, gradualmente, as reais di- 
mensões da ferramenta que possui, numa tentativa de do- 
minar essa tecnologia”. 

Os recursos mostrados no livro estão divididos em cin- 
co áreas distintas: de programação, de vídeo, de fita cas- 
sete, de disco e os recursos avançados. 

Entre os vários recursos, podemos destacar uma rotina 
capaz de unir programas previamente gravados em fita, 
coisa que normalmente só .é possível com programas em 
disco. Outro programa interessante é o editor gráfico, ca- 
paz da incrível façanha de gerar um programa que recria 
o gráfico editado, ao invés de copiar simplesmente as pá- 
ginas de vídeo em fita ou disco. Além desses, mais deze- 
nove programas do mesmo nivel completam essa bem 
cuidada obra que, evidentemente, não esgota o assunto, 
mas dá uma boa noção do que se pode fazer com o micro 
e um exemplo do que se pode fazer pelo usuário. 


Dicionário Essencial de Eletrônica, pesquisas: Juliano Bar- 
sali e Julio Amâncio de Souza, 80 páginas, 11,5x 15,5 em, 
Editele — Editora Técnica Eletrônica. 


Esse dicionário surgiu da necessidade de se ter uma fonte 
de consulta rápida e atualizada sobre uma infinidade de 
termos ligados à informática, microeletrônica, telecomu- 
nicações e diversos outros setores da eletrônica, como uma 
alternativa aos grandes dicionários — volumosos e com 
temas muito dispersos. Reduzindo o número de assuntos 
aos mais importantes, foi possível produzir um livro de 
bolso bastante prático e compacto, contendo cerca de 1000 
verbetes. Pela forma como foi elaborado, esse dicionário 
é util a profissionais de eletrônica, leigos e estudantes, co- 
mo fonte constante de novas informações e complemen- 
tação da Série Biblioteca Nova Eletrônica. 
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ATENDIMENTO 
PERSONALIZADO: , 
Equipes especializadas para 
orientá-lo ou demonstrar 
equipamentos emtodo o 
território nacional. 





| INFORMATICA: 
Completa linha de periféricos 
| ecomputadores, desde 
pessoais até Sistemas 
profissionais. 


ASSISTÊNCIA 
TECNICA: SUPRIMENTOS 
Profissionais altamente PARA CPD: 
qualificados, Diskeattas, formulários, fitas 
aptos a alender  paraimpressoras etc... 


qualquer tipo de necessidade. à pronta entrega. 


TREINAMENTO 
E CURSOS; ; n 
Mantemos cursos e treinamento |. RW INSTRUMENTOS: 
de operação gratuitos, [= d Equipamentos de teste e medição 
para as diversas áreas 


incluindo aulas práticas 


e material didático. da Eletrônica e Informática. 





AJUDANDO A DESENVOLVER TECNOLOGIA 
Rua Aurora, 165 — SP — Tel.: PBX (011) 223-7388 = Telex (011) 31298 Direto — SP — 223-1446/ 
222-3458/220-9113/220-7954 Direto outros Estados: 222-5430/221-0326/223-7840/222-0284 


NASCENTE 
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MEDICO! 
DENTISTA 


E AGRICULTOR/ 
É PECUARISTA 





CP500/Mº a grande solução. 


Garantia da maior biblioteca 
de programas aplicativos. 


O CP 500/Mº“ agora também é compati- 
velcom CP/M, o Sistema Operacional 
mais difundido no mundo. Isso significa 
que, somando o tradicional DOS 500 
como CP/M, você passa a dispor da maior 
biblioteca de programas aplicativos do 
mercado. Trata-se da solução inteligente 
e racional para o seu dia-a-dia, permitindo 
a você tirar vantagem de programas como 


Caracteristicas 


Memória RAM 
Memória ROM 
Compatibilidade 
Video 


SONORA 
64 kbytes 

2 Kbytes 
CE/Mº 
80 colunas por 
24 linhas 


* Marcas Registradas 


Sistema Operacional 


DOS 500 


48 kKbyie 

16 Kbyies 
TRS-DOS 

64 ou 3) colunas 
por 16 linhas 


CalcStar*, dBase II*, WordStar* e muitos 
outros, que vão agilizar tanto a sua vida 
quanto a da sua empresa: Folha de 
Pagamento, Controle de Estoque, Contas a 
Pagar/Receber, Administração Hospitalar, 
Cálculo Estrutural, Sistema de Balancea- 
mento de Rações e outros programas especi- 
ticos para o seu ramo de atividade. 

O CP 500/Mº possui saida paralela para 


Video 12º fósforo verde com controle de 
intensidade 

Teclado profissional capacitivo com numérico 
reduzido 

Interface para impressora paralela 

Interface serial padrão R5232-C (opcional) 
Frequência de Operação: 2 Mhz 

Unidade de som com controle de volume 

Opera com | ou 2 drives de face simples ou dupla 





impressora, e você pode instalar facilmente 
uma porta RS232-C, que o coloca em 
contato com a Rede Internacional de 
Telemática, além do Videotexto, Cirandão, 
Aruanda etc. Conheça no seu revendedor 
mais próximo o CP 500/Mº, 

Um grande passo na informática, com a 
qualidade CP e a Tecnologia Prológica. 
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INDICE 





|. CALENDÁRIO PERSONALIZADO 
Programa desenvolvido para o CP 500 ou CP 300, que 
permite a elaboração de calendários personalizados ... 2 e 3 


- TRANSFORME SEU CP 400 COLOR NUM CHAR- 
MOSO PROFESSOR DE FRANCÊS 

Três programas educacionais que permitem o aprendiza- 
do da lingua francesa. O primeiro programa é bascado 
no jogo da forca; o segundo, na conjugação de verbos 
e o terceiro, no aprendizado de palavras através de 
ANLONIMOS a ecran ta cpa og Ena a STAN dS US coa NRl CAT ag RE 3; 4,/9,:0, Ve SA 









3. TRINÔMIO DO 2º GRAU 
Continuação da listagem em Basic do programa educa- 
cional desenvolvido para o CP 200 ........ssesess ERP REA 8 


ESTE SUPLEMENTO É PARTE INTEGRANTE DA REVISTA GERAÇÃO PROLÓGICA Nº 15. NÃO PODE SER VENDIDO SEPARADAMENTE 


ss APLICATIVO 


Calendario Personalizado 


CP 500 ou CP 300 — 48 Kb RAM 


1986 está chegando... Não está na 
hora de um novo calendário? Então, 
não perca tempo: faça você mesmo o 
seu calendário personalizado e sur- 
preenda seus amigos com um presente 
original, pois,com este programa você 


LO CICICICICICICICICICICILIEIE IE IE IESE IEL DEI SEIT IE 


BO 5% CALENDARIO * 
30 CP-COMPUT. PESSOAIS * 
GO + CP-S00 * 
80 f 3H TRT A É LL. I O" CDE dp do di di Ra 


S0Ú EEE DE IE IE TETE IE DE IL IE IEL SETE IL IE IE IE IE IE IEEE LIES 
70 CLEAFE16000 | 

SO CLS 

90 DIM LECGOMMEBCIZ), DECT), DI(C1O), 
DS(1Z):FOR I=0 TO 60:L&(I)=S5TRINGS 
(230,92) :NEXT I:FOR I=1i TO 12:READ 
MEC(I)D:NEXT I:FOR I=1 TO V:READ D& 
(I):NEXT T:FOR I=i TO 10:DICI)=1:N 
EXT I:READ DF& 

100 DEF FNME(CXE, X)=STRING& CINTO (X—- 
LEN(XB))/8) 5,45) +X&+STRING&(-INT(-( 
X-LEN(X$))/2),45) 


110 PRINT'DESEJA CARACTERES EXPAND 


IDOS NA TELA (5/N)"s: INPUT Hg 

1z0 IF H&="Nº THEN CLS:GOTO 140 
LF H$t2"5" THEN GOTO 110 

130 CLS:PRINT CHk$(ZS) 


140 INPUT “ANO A IMPRIMIR ":ANO:PR 
INT 

150 PRINT "QTAS COLUNAS DE MESES(Z 
=3-&4-6)2 "4 


160 A$=INKEY$&:IF Ag="" THEN GOTO 1 
0 ELSE IF INSTE("Z346",A$)<I THE 


N GOTO 160 ELSE FRINT AS:NML=VAL( | 


H$) PRINT 


170 PRINT "QUAL O ESPACO P/ UM DIA 
(a AS)": 
150 A$=INKEY$:IF A$g="" THEN GOTO 1 


SO ELSE IF INSTR("2345",A$)<1i THE 
N GOTO 150 ELSE PRINT Ag: E=VAL(AS 
PEPRINT 

190 PRINT “QUAL A DISTANCIA EM CAR 
HCTERES ENTRE OS DIAS (1 A 5):"; 
200 A$=INKEY$:IF A$g="" THEN GOTO & 
OO ELSE IF INSTR("IZ345",Ag)LI TH 
EN GOTO 200 ELSE PRINT A$:F=VAL(A 
E): PRINT 
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poderá utilizar estéticas diferentes e 
qualquer tipo de formulário. 

De fácil operação, pois todos os co- 
mandos e opções aparecem na tela do 
computador, este programa possibili- 
ta a elaboração de calendários eternos, 


com opções para ajustes de espaços en- 
tre os dias e meses, dependendo do ca- 
ractere escolhido. Digite corretamente 
a listagem em Basic e, nas opções, per- 
sonalize seu calendário com a estética 
que escolher. Agora é só Imprimir na 
sua P 500 e feliz Ano-Novo! 


“LO FRINT "QUAL A DISTANCIA EM CAR 
ACTERES ENTRE OS MESES (i A 9)2"; 
ca) He=INKEY$: IF A$="" THEN GOTO 2 
a) ELSE IF INSTR("123456789",0$)< 
1 THEN GOTO Zão ELSE PEINT A$:D=V 
HL(AG) PRINT 

230 C=7xE+64F+D:M$="51263130313031 
3130313031":IF ANO/4=INT(ANO/4) TH 
EN MID$(M$E,4)="9" 

Mão DS(1)=(ANO-1)*%365+INT((ANO-1)/ 
4):DS(1)=DS(1I)-INT(DS(1)/7)%7+1 
230 FOR I=g TO 1Z:DS(I)=DS(I-1i)+VA 
L(MIDECMPsSHI—-S,2))—-1:D5(1I)=DS(I)- 
INT(DS(1)/7)%47+1:72NEXT T 

ol) MIDECLECO) sCHNML/2-3)="*4"+5TR$ 
(ANO) +" x! 

270 FOR I=1l TO 12 STEP NML 

220 FORJ=OTONML-L:MES=J+I:L=(I-1)* 
1O/NML+Z:MID$(CLECL), JXHC+HI)=FNME (ME 
(MES) ,C)FL=L+Hi 

«90 FOR S=1 TO Z:MID&ECLE(CL)sD/2+]+% 
C+1+(S-1)*4(E+F))=LEFT&(D$S(S)  E)ZNE 
RT Ss 

300 IN=DS(MES):DI=1:FI=7:DM=VAL(MI 
D$(ME,MESHZ-1,2)) 

510 L=L+1 

320 FOR E=IN TO FI:DU=DI+K-IN:MID$ 
(LECL)sD/2+JHC+HI+(kK-IL)X(E+F))=STERI 
NGS (E+I-LENCSTR$(DU)) , 32) +RIGHTE(S 
TR$ (DU) sLEN(STRE (CDU) )-1): DE$=STR$( 
Dio +STRSCMES) + 

330 IF INSTR(DF$,DE$)<)0 THEN MID$ 
(LECL)sD/2+JHC+HI+(K—-IL)XCE+P) )=LEFT 
G("FERIADO",E) 

340 NEXT EK 

350 DI=DI+FI-IN+1:IN=1:IF DI-1i=DM 
THEN GOTO 380 

360 IF FI+DI-1)DM THEN FI=DM-DI+1 
370 GOTO 310 

380 NEXT J:NEXT 1 

320 FOR I=0 TO 12Z2/NMLHIO:ZLPRINT LE 
FTE(LÊSCT)s CHANML) NEXT T:CLS: END 


GERAÇÃO PROLÓGICA 


400 * 
Oro 
e (o 


430 DATA JANEIRO, FEVEREIRO, MARCO, A 
BRILsMAIO, JUNHO, JULHO, AGOSTO, SETEM 
BRO, OUTUBRO, NOVEMBRO, DEZEMBRO, DOMI , 
NGO, SEGUNDA, TERCA, QUARTA, QUINTA; SE 


MESES POR EXTENSO 


XTA, SABADO 

440 * 

450 * DATAS DE FERIADO PERMANENTE 

460 * 

LAO DATE [A To 2 oReta TA» 6/ 6 
ERA ao Ato 1a do AR LS A 


ti 
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EDUCACIONAL, 


Transforme seu CP 400 Color 
num charmoso professor de francês 


“CP 400 Color — 16 Kb RAM 


Une saison dans Penfer. 

Você sabe o que está escrito aí em 
cima? Não?!!! 

Então, está na hora de começar a 
aprender francês, a língua mais român- 
tica e sensual deste planeta. E também 
a mais gostosa... alguns restaurantes 
têm uma comida deliciosa, mas de di- 
fícil pronúncia. Além disso, você po- 
derá ler grandes autores no original: 
Flores do Mal, de Baudelaire; !umi- 
nações, de Rimbaud; Poemas, de Paul 
Verlaine. Quer mais? 


Então, digite os três programas que 
seguem e faça de seu CP 400 Color o 
mais charmoso professor de francês. 
Mas o mais importante é que você 
aprenderá brincando — como todo 
bom parisiense. E, quem sabe, um dia 
você estará sentado no Café du Paix, 
em Sant Germaine, lendo o Le 
Monde... 

No programa número 1, FORCA, 
você aprenderá francês com o conhe- 
cido jogo da forca; no número 2, li- 
ções sobre conjugação de verbos e, no 


ao O a 


número 3, você terá 20 questões sobre 
antônimos. Tudo em francês... menos 
as instruções e comandos a utilizar: O 
professor CP 400 Color mostrará tu- 
do no video. 

Bem, se você for um bom aluno, em 
pouco tempo poderá traduzir este poe- 
ma de Verlaine: 


“Aimez, aimez! Ô chêres Esseulées, 

Puisqu'en ces jours de malheur, vous 
encore, 

Le glorieux Stigmate vous decore”. 


PROGRAMA Nº 1 — FORCA 


1 EXXKEKEKEKKXKKKKKKXXAXKKKARKK 


ot “x FORCA —- FRANCES * 
30 “x CF-COMPUTADORES FESSORIS * 
4 “x CFr-4OO COLOR 


SO (CRKXEKKEKKXEXKXKLKKKKKKARKK KA 


6g CLS6 


70 PRINTGIL9Z+4, "CP-COMPUTADORES 


PESSOAIS"; 


80 FORTI=1ITOLBBOB:;NEXTTI 
98 DATA L'ABEILLE,L'/ABRICOT,L“AC 
HAT, ACHETER,L/ACTEUR,LADVEREBE,»L 
“ADDITION,L'“AFFICHE,L'AGENT>L“AI 
L+AIMER,L'/ALGEBRE, AMUSANT>L“ ANNE 
E,L'ANNIVERSAIRE-APPORTER, AFFROA 
CHER,L/BFRES-MIDI,L'ARITHMETIQUE 
7«ARRETER,-L'ASSIETTE, ASSURER,ATTE 
NDRE >» AU-DESSUS DE-AUSSI 
100 DATARUTANT»L“AUTOBUS,AVANT>A 
VOIR;AVRIL;LES EAGAGES,LE ERIN,L 
A BANDE,LA ERREE,LE EKEAS,LE ERTER 
U, REAUCOUP,LE BEURRE-LA EITEREsLE 
BILLET,BEDIRE-LA EOITE, RONJOUR»L. 
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A BOUCHE,LE 
LE,LE ERAS, EROSSER-»LE ERUIT:>COMM 
E CI,LE CASHIER-LE CAMION 

* 110 DATA LE CANARD,;LA CARTE-CASS 
ER+CE QUE,CE SONT;LA CEINTURE-»CE 


EOULANGER>»LA EQUTE IL 


FENDANT; LA CHAMEBRE-LA CHANSON,» SE 


CHARGER DE,LE CHAT>AVOIR-LA CHE 


MISE,CHERCHER»LES CHEVEUX-LA CHI 
MIE,LA MOUSSE AU CHOCOLAT,» QUELQU 


E CHOSE-LA CIGALE,CINQUANTE-LA C 
LEF,LE COCHON;LA COLLINE 

120 DATA COMME, COMMENCER-LE CUMP 
LET,LA CONFITURE-CONSTRUIRE-LE C 
ONTRAIRE-LA COFINE-LE CORPS» COUC 
HER>LE COULOIR->LE COUTEAU-LA CRA 
TE,LA CUISINE-LA DAME, DEBOUT-DEJ 


EUNER,LA DEMI-HEURE»LA DENT;>DESC 


ENDRE, DEUX, DEVENIR, DIFFICILE-LE 
DINDON,LE DINER-LE DISQUE 

130 DATA LE DIVAN,DIX-SEFT.LE DO 
IGT,DORMIR-LE DRAF»L'ECHARFE-ECO 
UTER-L'EGLISE,ELECTRONIQUE, EMERA 


q 


EE 


SSER-EMPRUNTER, ENERGIQUE , ENSEMEIL. 
ErENTRER-»L'EFOULE,I./ESCALE,I./ESC 
ARGOT, ESSAYER,L'/ESTOMAC,L'ETAT.L 
“ETOILE, ETROIT:ETUDIER,L/EVIER,I. 
“EXCURSION»LE FACTEUR,FAI 
148 DATA LA FAMILLE->LE FAUTEUTL 
LA FENETRE-LA FETE,LA FIEVRE-LA 
FILLE,LA FLEUR,LA FORME>LA FOURM 
LILA FRAISE-LE FRERE,LE FROMOGE» 
LE GANT;LE GARDE-LE GENOU;LA GEO 
METRIE-LE GIGOT;LA GORGE,LA GRAN 
D-MERE-»LA GRENADINE, GROSSIR, HARE IT 
LLER>HABITER>L/HEREE 
156 DATA HEUREUSEMENT;HIER.L/HIU 
ER-L'HORAIRE;L'/HOTEL, HUIT, IMFRES 
9TONNER, INDIQUER,S' INQUIETER.+ INT 
ERESSANT;» IRREGULIER,;LA JAMEE,LE 
JARDIN» JEUNE; LA JOURNEE-LA JUFE, 
LE LAC;LA LATTUE,LA LANGUE-ZLE LE 
GUME-LTIBERE>LA LIGNE,LE LIT;LONGT 
EMPS>LA LUNE MADAME 
160 DATA LE MAGASIN,LE MAGNETOFH 
ONE-LA MATN; MALADE, MALHEUREUSEME 
NT;LA SALLE A-sLE MARCHE-LE MARI» 
LES MATHEMATIQUES-,LA MATIN-LE ME 
DECIN;LA MIETTE-MINERALE,LA MODE 
LE MOTS;LE MONNATE-LA MONTAGNE 
MONTRER-LE MOTO-MOURIR:LE MOUTON 
LA MUSIQUE-LA NAFPE 
1780 DHTA NEANMOIS, NECESSAIRE-LA 
NEIGE-NETTOYER>LE NEZ,;LE NOM, LE 
NORD-QUEST»NOUVEAU, LA NUTT,L/ONC 
LE 1. 'OREILLE, QUELIER, OUT, OUVRIR, 
LE FAIN-;LE FAMPLEMOUSSE,LE PANTE 
R>LE PAFIER-LE FAQUET,FARCE QUE, 
PARIER-LA FARTIE,FASSER, FATINER» 
PHUVRE-LA PECHE,FEIGNER 
1984 DATA PENSER-LA PHARMACIE-LA 
PHYSIQUE-LE FIED,;LE FIQUE-NIQUE, 
FLEUVOIR>-LE FPOETE-LA FOTRE-LE FO 
ISSON;LA FOMME-LA FORTE, FPOSER UN 
E QUESTION-FOUVOIR;PREMLER,LE FR 
IXx+FPROMENER»>LE PROVEREE-LE FUPIT 
RE QUATORZE» QUATRE, QUELQUEFOIS» 
ULNZE,LE RAFPORT>RECEVOIR 
198 DATA LE REFRIGERATELR, REGRET 
TER>REMPLACER; LES RESEIGNEMENTS» 
REPASSER-SE REPOSER,LE RETOUR-RE 
USSIR-REVEILILER,AU REVOIR>sLE RHU 
ME rRISQUER DE-LA ROBE,LE ROSEIF, 
LA ROUTE-LA RUE-AU COIN DE LA,LE 
RYTHME-LF SAISON,LE SAUCISSONAL. 
A SAUTERELLE; SCOLATRE 
og DATA LE SERFPENT,LA SERVIETTE 
Lt SINGE,LE SOIR,;LE SOMMEIL>LA 
SOUCOUFE, SOUVENT. LE STAGE-LE STY 
LO-LE SUD-QUEST;LA SUITE, SURTOUT 
'LE THAELEQU,LE TAFIS,LA TASSE,LE 
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TRA 


TEMPS, SE TERMINER-LE TIGRE,LA T 
OMATE,LA TRANCHE, TRAVERSER.TYFIQ 
UE. »LES VACANCES,LA VACHE 
olB DATA LE VELO, VENDRE,LE VENT:» 
LE VERRE-LA VIEILLESSE;LA VILLE; 
LH VITRINE-LA VOITURE-FPORTIR EN» 
Hs cáulo 
cold CLS:DIMAS.I30):FORA=ITOL4ZELS 
=EL$S+CHR$C1Z8) :NEXTA:FORA=201TOU4 
B9STEFSZ:FRINTEA,ELS::NEXTA 
290 PRINTOGZSS.CHR$(ÇI59)+CHRECISA 
)J+CHR$(156)+CHR$CÇISB)+CHR$(ISS)+ 
CHR$(156)+CHR$C157)+CHR$ECISG6);: 
cut PRINTEZ6?,CHR$(159)+CHR$CIAZB 
J+CHR$C(130); 
coa PRINTOZ99,CHR$CIS9)+CHR$CISO 

":FORA=S31TOMPISTEPISZIFRINTOGA,C 
HR$(Ç159);2:NEXTA 
260 T=RND(307):FORY=1ITOTEREADAS: 
NEXTY 
270 E=l.ENÇA$S)z:FORQ=ITOE:ASCQ)=MI 
D$E(CAS»0, 192NEXTO 
ct) PRINTEP6- "LETRAS USADAS: "s=F 
ORB=1ITOBE:PRINTESS+A,"-"==NEXTA 
29t) PRINTOLSA, "QUE LETRA?": 

00 PRINTGIZ2," Ps 

510 TKE=INKEYS 

du ES=INKEYS:IFE$=""OREg=CHR$ECI 
39 THENSEM 

390 PRINTOIZE.BEssFORTI=LTO4GENE 
XT tl: 

340 FORQ=1TOE: IFE$S=0$(0)THENFRIN 
TEQ+38, Eb; :SOUNDISO,I 

390 NEXTG 

360 FORQ=1TOE:IFES<>0$8(0) THENNEX 
TQ:6=6+1:SOUNDS>1:0N G GOSUE 4agB 
4IB,U4ZA, 430, UU. USA, USB, 47A-, USB 
3720 FRINTEGU+IILO, Es sb=W+1 

380 FORQ=LTOB: IFCHR$&CFEER(IO62+n 

J)=AS(Q)ORFEEKR(LO62+40)=64+ASCAS 
(Q)STHENNEXTQ:FORT=1ITOZAsFRINTEL 
&r "CORRETO": z:FORTT=1TOLG:ENEXTTT: 
FRINTGILA," “22 SOUNDISO, 1:F 
ORTT=1TOZB:NEXTTTE:NEXTT:RUN 
390 GOTOZ9A 
YA FPRINTAZ72; CHR$(158)+CHR$ÉC159 
J+CHR$(157);:2:FRINTOE3SOL4,CHR$CISZ) 
+CHR$(159)+CHR$(1583::RETURN 
410 PRINTO3S36,CHR$CI4Z)+CHR$SCIHS 
J+CHR$CIUZ)ssPFRINTOSSSB, CHR$CIUS) 
+CHR$ECILUZ)+CHR$CIUI) sE:PRINTOU4DA, 
CHR$CÇIZ5)+4CHRSCIZS)+CHR$ECIZS e Ê 
RINTGUSA,CHR$CIZA)+CHR$ECIVE3+CHR 
$(172); RETURN 
4itg PRINTQGUSA,CHR$CIZ5);2:PRINTOAU 
64» CHR$(175)5:RETURN 
4350 FRINTOGLUZU4,CHR$(175);:FRINTE! 
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66+CHR$(1725)53RETURN 

4ULuA FRINTEGSSS, CHR$CI4YB)s:PRINTAS 
67 +CHR$(13835:RETURN 

450 PRINTGS39,CHR$CI4IIs2:PRINTOS 
71, CHR$(133);:RETURN 

440 PRINTGI99, CHR$(15A) 2 RETURN 

420 PRINTQUOS,CHR$ (1572): 3 RETURN 

480 PRINTQU9S, CHR$ECI77)+CHRS(IBI 
)s “RETURN 

498 FRINTQU99, CHR$(187)+CHR$CI7ZE 
e 

SOB FPRINTeO," A FALAVRA E” “"s=CHR 


PROGRAMA 


DD CREXEXRRNNRI REDE EEE EK 
Zo “x VEREOSZFRANCES * 
50 “x CE “uga COLOR x 
4 “x CP-COMPUTADORES FESSDAIS x 
DO (XRXKXKKXKKKKXKKKXKAXAKKXKNR EX 
át CLS: SOUNDSS9, à: SOUNDES, E: SOUN 
D133,4:SOUNDISS- 4: SOUNDIMYZ5 4: SO] 
ND147, 4: SOUNDI 76, 6:50UND1S9, 2:80 
UNDI3S3,4:CLS 

Z0 PRINT'QUAL E“ O SEU NOME?" :IN 
FUTNAS 

80 IFNA$g=""THENFRINT"E” NECESSAR 
IO UM NOME" :GOTOZ6 

980 AS(1)="FRIMEIRA FESSOA DO SIN 
GULAR" 

1igy Asc2)="SEGUNDA PESSOA DO SIN 
GULLAR" 

110 A$gc3)="TERCEIRA FESSOA DO ST 
NGULAR" 

lag Ag(uy)="PRIMEIRA PESSOA DO FL 
URAL. ” 

158 A$(5)="SEGUNDA PESSOA DO FLU 
RAL." 

l4t Afç4)="TERCEIRA FESSOA DO FL, 
URAL. 

150 NU=56 

16h FORX=1TOLS 

1720 RESTORE:A=RNDENV) :C=RND(6) 
L96 FORE=ITOA:FORD=ITOZ;READV$ÊCID 
JRNEXTDO,EsCLS:PFRINTX:FRINT:PRINT 
TRE(B)VECI):PRINT 

190 PRINTA&CC) 

20B INPUTF$&:PRINT:IFFEF&=V$cC+risTH 
ENPRINT"ESTA CORRETO, "s:NAg;" 14 
cK=K+1 ELSE SOUNDIO,5S:PRINT'HJE R 
EGRETTE; VOUS AVEZ TORTI"SFRINT: 
PRINTVUSCE)sTOECIS)VÊCS)FPRINTVÊC 
3)F TRHEÇIS)VSCÇSO)FERINTVS CU) TREÇI 
3)U$(7) 

cl PRINT:FRINT:FRINT"ERESSIONE 
QU TECLA FZ CONTINUAR! 
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(SM) FAS: CHR$ (IL): SOUNDBO, BESETC 
33717,%):SOUNDB9, BIRESET(33,17)3: 
SOUND8B9 ,4:SET(36:17,7):SQOUNDS9,A 
ZRESET(36,17):SOUND117,8:SET(33, 
17,2) 7:6S0UNDIDS,UzRESET(33,17):50 
UNDI0S;8:SET(36,17,2):S0UNDB9,4Us 
RESET(36+17):S0UND8B9,8 

18 SET(36,-17,2)2:SOUNDZB, UsSET(S 
397 17,%):S0UNDB9. 9:RUN 

da FORE=1TOSB7:READAS:NEXT:FRIN 
TAS 


Nº 2 — VERBOS 


So Jygp=INKEYS: IF Jy$=""THENGADEL. 
9ECLSB 

dot NEXTX 

ou IF kK<ly THEN GOTOS96 

20 FORQQ=1TOZ:SOUNDEB?,4:SOUNDIO 
Sr: SOUNDIAS» 4: SOUNDOO, LU: NEXTON 
com FORQU=1TOZ:SOUNDIAS, 4: SOUNDIA 
3944 SOUNDIHZ. B:NEXTOQ 

“70 FORQQ=1T0Z:SOUNDIU4Z,&:SOUNDI 
97724 SDUNDILUZ, à: SOUNDISS. Z: SOUND 
1ã3r4: SOUNDSS,L4INEXTOQ 

80 FORQU=1TOZ:SOUNDB9P, 4: SOUNDSE 
1H: SOUNDS? , BG: NEXTQO 

CPB PRINTOCOEST TOUT VSPRINTRES 
D“ENTRE 15 SONT CORRECTS" 

styy END 

514 DATRACHETER,» JXACHETE,» TU ACHE 
TES+ IL ACHETE-NOUS ACHETONS, VOUS 
HCHETEZ. ILS ACHETENT 

Se DATAAIDER,- J'HAIDE, TU ATDES, TL 
AIDE,NOUS ATDONS-» VOUS AIDEZ,. ILS 
AIDENT 

398 DATAANNONCER:» J ANNONCE:TU AN 
NUNCES» IL ANNONCE»NOUS ANNONCONS 
"VOUS ANNONCEZ, ILS ANNONCENT 

346 DATABFFELER, JAFFELLE, TU APR 

ELLES, IL AFFELILE,NOUS AFFELONSsV 
OUS AFFELEZ, ILS AFFELLENT 

3560 DATRAAPFROCHER» JºAFFROCHE» TU 
APPROCHES, IL APFROCHE,» NOUS AFERO 
CHONS, VOUS AFFROCHEZ> ILS AFFROCH 
ENT 

364 DATAARRETER. J'ARRETE, TU ARRE 
TES» TIL ARRETE,NOUS ARRETONS, VOUS 
HARRETEZ> ILS ARRETENT 

3720 DATAEROSSER, JE BEROSSE, TU EROQO 
S5SES, IL EROSSE, NOUS EBROSSONS» VOU 
S EROSSEZ, ILS EROSSENT 

388 DATACACHER, JE CACHE, TU CACHE 
S, IL CACHE-NOUS CACHONS, VOUS CAC 
HE. Z> ILS CACHENT 


=. 


390 DATACASSER, JE CASSE, TU CASSE 

S, IL CASSE,NOUS CASSONS, VOUS CAS 
SEZ, ILS CASSENT 

40B DATACHANTER- JE CHANTE,TU CHA 
NTES+ IL CHANTE»- NOUS CHANTONS» VOU 

S CHANTEZ, ILS CHANTENT 

416 DATACHERCHER: JE CHERCHE, TU C 

HERCHES, IL CHERCHE; NOUS CHERCHON 
S, VOUS CHERCHEZ, ILS CHERCHENT 

4ZB DATACOMMANDER- JE COMMANDE + TU 
COMMANDES, IL. COMMANDE; NOUS COMM 

ANDONS, VOUS COMMANDEZ, ILS COMMAN 
DENT 

430 DATACOMMENCER, JE COMMENCE » TU 
COMMENCES, IL COMMENCE, NOUS COMM 

ENCONS, VOUS COMMENCEZ, ILS COMMEN 
CENT 

440 DATACONNAITRE» JE CONNAIS, TU 
CONNAIS, IL CONNAIT>NOUS CONNAISS 
ONS, VOUS CONNAISSEZ,» ILS CONNAISS 
ENT 

450 DATACOUCHER, JE COUCHE> TU COU 
CHES, IL COUCHE> NOUS COUCHONS» VOU 
S COUCHEZ, ILS COUCHENT 

448 DATACROIRE, JE CROIS, TU CROIS 
pTL CROIT+NOUS CROYONS, VOUS CROY 
EZ, ILS CROIENT 

4720 DATADANSER, JE DANSE, TU DANSE 
SIL DANSE- NOUS DANSONS, VOUS DAN 
SEZ, ILS DANSENT 

490 DATADESCENDRE, JE DESCENDS, TU 
DESCENDS, IL DESCEND, NOUS DESCEN 
DONS» VOUS DESCENDEZ, ILS DESCENDE 
NT 

490 DATADEVENIR, JE DEVIENS, TU DE 


VIENS,» IL DEVIENT; NOUS DEVENONS»V 


OUS DEVENEZ, ILS DEVIENNENT 

48 DATADIRE-JE DIS;TU DIS, IL DI 
T, NOUS DISONS> VOUS DITES, ILS DIS 
ENT 

910 DATAEMPRUNTER, J'EMPRUNTE, TU 

EMPRUNTES» IL EMPRUNTE, NOUS EMFRU 
NTONS» VOUS EMPRUNTEZ, ILS EMPRUNT 
ENT 

dot DATAENDORMIR» J'ENDORS, TU END 
ÚRS» IL ENDORT:NOUS ENDORMONS, VOU 
S ENDORMEZ, ILS ENDORMENT 

dot DATAESFERER,» J ESPERE, TU ESFE 


RES» Tl ESFERE, NOUS ESFERONS, VOUS 


ESPEREZ, ILS ESPERENT 
48 DATRESSAYER, J'ESSATE, TU ESSA 
IES» IL ESSHTE, NOUS ESSAYONS, VOUS 
ESSAYEZ, ILS ESSAITENT 
9980 DATHAESSUYER, JJESSUTE, TU ESSU 
IES,» IL ESSUIE,» NOUS ESSUYONS, VOUS 
ESSUYEZ, ILS ESSUTENT 
268 DATAHAEILLER, J HABILLE, TU HA 
BILLES> IL HABEILLE, NOUS HAETLLON 
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97 VOUS HAEILLEZ,» ILS HABILLENT 
970 DATAINVITER-JOINVITE,TU INVT 
TES» IL INVITE-NOUS INVITONS, VOUS 
INVITEZ, ILS INVITENT 
80 DATAJETER- JE JETTE, TU JETTES 
»IL JETTE,NOUS JETTONS, VOUS JETT 
EZ> ILS JETTENT 
978 DATALHISSER- JE LAITSSE.TU LAT 
SSES, IL LAISSE-NOUS LAITSSONS, VOU 
o LAISSEZ, ILS LAISSENT 
698 DATALAVER, JE LAVE;TU LAVES,T 
L LAVE-NOUS LAVONS: VOUS LAVEZ» IL. 
o LAVENT 
610 DATALIRE-JE LIS,TU LIS, ILI. 
1T+NOUS LISONS,VOUS LISEZ, ILS LIT 
SENT 
620 DATAMANGER» JE MANGE, TU MANGE 
S» IL MANGE,NOUS MANGEONS, VOUS MH 
NGEZ,» TIS MANGENT 
650 DATAMONTER- JE MONTE, TU MONTE 
S» IL MONTE;-NOUS MONTONS, VOUS MON 
TEZ, ILS MONTENT 
646 DATA MOURIR, JE MEURS, TU MEUR 
Sr JL MEURT;NOUS MOURONS, VOUS MOU 
REZ> ILS MEURENT 
650 DATANAGER, JE NAGE, TU NAGES, T 
|. NAGE, NOUS NAGEONS, VOUS NAGEZ,I 
Lo NAGENT 
666 DATANAITRE, JE NAIS, TU NAIS,T 
L NAIT. NOUS NAISSONS, VOUS NATSSE 
Z+ ILS NAISSENT 
6780 DATANETTOYER- JE NETTOTE, TU N 
ETTOTES, IL NETTOTE,NOUS NETTOYON 
97 VOUS NETTOYEZ, ILS NETTOTENT 
sy DATA OFFRIR-> JE OFFRE,TU OFFER 
Eos It OFFRE-NOUS OFFRONS, VOUS OF 
FREZ> ILS OFFRENT 
6920 DATAORGANISER, JE NRGANISE, TU 
ÚURGANISES,» IL ORGANISE, NOUS ORGA 
NISONS» VOUS ORGANISEZ, ILS ORGANT 
SENT 
708 DATAQUELTER, J QUELTE, TU QUEIL. 
IES, IL OUELITE; NOUS QUELTONS, VOUS 
QUELIEZ, ILS QUELIENT 
714 DATAFASSER, JE PASSE, TU PASSE 
S» IL FASSE,NOUS PFASSONS, VOUS PAS 
9EZr ILS FASSENT 
Zul DATAPFEIGNER, JE FEIGNE,TU PEI 
ONES» IL FEITIGNE-NOUS FEIGNONS, VOU 
S FEIGNEZ, ILS FETGNENT 
738 DATAFERMETTRE, JE PERMETS. TU 
PERMETS>» IL FERMET»NOUS PERMETTON 
3» VOUS PERMETTEZ, ILS PFRMETTENT 
7248 DATAPFREFERER» JE FREFERE,TU P 
REFERES, TL FREFERE-» NOUS FREFERON 
97 VOUS FREFEREZ» ILS FREFERENT 
7598 DATAFPRETER- JE PRETE,TU FRETE 
3» IL FRETE-NOUS FRETONS, VOUS FRE 
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TEZ» ILS FRETENT 

760 DATA FROMENER, JE FROMENE, TU 
PROMENES- IL FROMENE, NOUS PROMENO 
NS» VOUS FROMENEZ, ILS FROMENENT 
778 DATAFROMETTRE, JE PROMETS» TU 
PROMETS» IL PROMET>»NOUS FROMETTON 
Sr" VOUS FROMETTEZ, ILS FPROMETTENT 


7280 DATAFRONONCER, JE FRONONCE, TU 
FRONONCES, IL FRONONCE, NOUS PRON 

UNCONS; VOUS FRONONCEZ, ILS FRONON 
CENT 

720 DATAQUITTER, JE QUITTE, TU QUI 
TTES, IL QUITTE,NOUS QUITTONS, VOU 

So QUITTEZ, ILS QUITTENT 


PROGRAMA Nº 3 — ANTÔNIMOS 


LO LEXKKKEXKXXKKKKXKKAKKRR KH 
2h “x FRANCES * 
30 “x CP 4Ba COLOR x 
4a “x CF-COMPUTADORES FESSOAIS «x 

DO KEKKKKXXKXKKXKXKKXKKKKKN NM X 

60 CLS:AN=79:DIMAAÇAN):FORB=1T01 
1:EL$=ELS$+CHR$CIZB):NEXTA:FORA=A 
TO4BOSTEFS2Z:FRINTRA,BL$::NEXTH:E 

ORH=1TOs4:GE$=GE$+CHR$(128):NEXTA 
70 FORA=1ITOL4BISTEFPI2:PRINTGR>CHR 

$(4393); :PRINTGR+?, CHR$(255)::NEX 
TAzFORA=1T06:0$8=0$+CHR$(255):NEX 

TH:PRINTeZ,0$;:FORA=386TO4BESTEP 

S2sPRINTQGA, 06; :NEXTA 

80 PRINTEG388, CHR$(254)+CHR$(253) 
FsPRINTQGL4ZA, CHR$ CRUZ) +CHR$ECEUISS 

90 Y1i$=CHR$(156)+CHR$(157)+CHRSC 
139) +CHR$(159)+CHR$ (159) +CHRÉCIS 

P)aYa$S=CHR$CI2B)+CHRECIEZB)+CHRS$C 
O) +CHR$(1564)+CHR$CI157Z)+CHR$ÉCIS 
7) 2PRINTO3U4, YI$S;:PRINTO66. YES: 
ly) PRINTOLSA,"GUILHOTINA"::FRINT 
726 -+"DAR O ANTONIMO DE:": 

110 FRINTEG395,! TOTAL DE 2h QUES 
TOES": 

1Z0 PRINTe43A, "CORRETAS" :z:PRINTO 
462» "INCORRETAS": 

138 PFO=3y4 

l40 FORJU=1TOSO 

130 RESTORE 

146 R=RND(AN) 

1728 IFAAÇRy=1THENISDELSEAAÇR9=1 
180 FORC=1ITOR:READAS, EsS:NEXTC 
170 ONRND(2)GOTO2ZHA, 220 

ctg FPRINTGIS9,AS;::PRINTAIZIL, "ss 
INFUTAN$:IFANS=ESTHENNC=NC+IELSE 
PFRINTO235-"ERRADO,O CERTO E'-"s: 

PRINTOGZ48,E%::GOTOZUA 

lg SOUNDISA,2:6G0T0ESM 

col PRINTOILS9, EbssPRINTOLZA, soa 
INFUTAN&: IFANS=ASTHENNCENC+ILELSE 
FRINTGZIS,"ERRADO,O CERTO E/-"ss 
FRINTGZ68B,.AGB:zGOTOZUA 

230 SOUNDISO, Z:G0TOZSO 

240 SOUNDS,» 1:FORBA=34TOZPASTEFSE: 
FRINTGA,GES;:FRINTOB+3A, Y1L$;:FRI 
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NTGA+64, YZ$; 2: FORTI=1TOS:NEXTTIZN 

EXTAZERINTESZZ, GES;:FRINTOSSA, GÊ 

$;2:FORTI=1TOS00:;NEXTTI:ZFRINTESL, 

Yi&;:PRINTOG6, YES; 

eo WOB=" Ato 

0RA=139TOZ6S7STEFI2:FRINTAA, WOGS: 

NEXTAZPRINTOULUO, NC; :PRINTQUZ2, JW 

NC: sNEXTJW , 

co IFJW-NC=20THENFRINTESS6S +» CHR$ 

(54) 5 "NENHUMA CERTA!:CHR$ECIU) EF 

ORT=1 TOS66:NEXTT:GOTO 288 

278 GOTO 290 

co PRINTES96, "TALVEZ 
"s]PRINTGLUZB, "NA PROXIMA VEZ 

IPs sPRINTQUSO,! 

"5 2FORT=1TOS00:NEXTT:END 
art IF NC=20 THEN CLS ELSESEA 
SM FRINTGL98,"P ARA E ENS! 
FORT=1 TOLODENEXTECLS:V=V+I 
310 IF V>3 THEN END ELSE 300 
340 PRINTOZSB, 'xux SEU PLACAR xx 
*"2FORT=1T0306:NEXTT:END 


398 
340 
358 
368 
370 
380 
39H 
“aa 
4163 
uZa 
430 
Lua 
450 
4át 
426 
usa 
496 
590 
518 
Sá 
7017 
Sum 
598 
560 


DATE 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
LATA 
DATA 
DATA 
DATA 
DATA 


HESENT, FRESENT 
ACCEFTER, REFUSER 
ACHETER, VENDRE. 
ALLER, VENIR 

AMI, L/ENNEMI 
ANCIEN, MODERNE 
ARRIVER> PARTIR 
L'AUTOMNE,LE PRINTEMES 
AVANT+APRES 

HVEL» SHNS 

EAS,» HAUT 

EEAU,LAID 
EEAUCOUF» PEU 

GTEN, MAL. 

LE ERUIT,>LE SILENCE 
CHAUD,> FROID 

CHER, EON MARCHE 

LE COMMENCEMENT>;LA FIN 
COMMENCER,FTINIR 
COURT+>LONO 

DEKEOUT+; ASSIS 
DEMANDER, REFONDRE 
DEVANT, DERRIERE 
DROIT.GAUCHE 





DATA 
DATA 
DATA 
DATA 
DATA 
62% “DATA 


570 
580 
598 
500) 
610 


DATA 
LATA 


658 
640) 
E 
654 
660 
676 
68 
594 
748 
714 
SE 
7 EM 
256 
741 
7538 
76H 
778 
781) 
7294 
Btita 
818 
Bed 
5H 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATE 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATE 
DATA 
DATA 


je E ERÊ pro o a im Secr ogia np E 
EMPRUNTER, FRETER B4y DATA PARAITRE-DISFARAITRE 
ENTRER,SORTIR so DATA FARESSEUX, TRAVATLLEUR | 
L'EST,L' QUEST 868 DATA FAUVRE-RICHE 
L'ETE,L/HIVER 70 DATA LE FLANCHER,LE PLAFOND 
FACILE,DIFFICILE 886 DATA PLEIN, VIDE 
FERMER» OUVRIR 890 DATA FLEURER-RIRE 
FORT. FATELE 900 DATA FLUS,MOINS 
LE GARCON.LA JEUNE FILL 918 DATA FOLI, IMPFOLI 

2d DATA POSSIELE. IMPOSSIELE 

GRAND, FETIT 930 DATA FREMIER,DERNIER 
LA GUERRE,LA FAIX 940 DATA FRES DE-LOIN DE 
HEUREUX, TRISTE osy DATA PROFPRE,SALE 
HE TR, DEMBIN 768 DATA QUELQUE CHOSE,RIEN 
1. “HOMME,LA FEMME 970 DATA QUELQU* UM, FERSONNE 
REST eia 960 DATA LA QUESTION;LA REFONSE 
LO JEUNESSE;LA VIEILLES 996 DATA REUSSIR,ECHQUER 

IBHHO DATA LE ROI-LA REINE 
JQUER, TROVATLLER 1616 DATA SS AMUSER,S:ENNUYER 
LE JOUR,LA NULT 1020 DATA LE SOLEIL:;LA LUNE 
LARGE -ETROILT 1030 DATA SOQUVENT, RAREMENT 
LEGER» LOURD l04G DATA SUR, SOUS 
LE LENDEMBAIN;LA VEILLE 1958 DATA UTILE, INUTILE 
LE MARI,LA FEMME 1068 DATA LA VIE-LA MORT 
MIDI; MINUIT 19720 DATA LA VILLE,LA CAMPAGNE 
MONTER, DESCENDRE 1080 DATA VITE,LENTEMENT 
NE, MORT LA9SG DATA VIVRE,MOURIR 
LE NORD;LE SUD 1100 DATA VOICI,VOILA 
OEE TR, DESOEEIR 1iig DATA VRAL>FOUX 
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Trinômio do 2º GRAU 


No número anterior, publicamos a 
primeira parte do programa Trinômio 


do 2º Grau — um eficiente instrumen- 
to para a introdução à informática no 
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setor educacional. Agora, você pode- 
ra completar sua listagem em Basic e 
transformar seu CP 200 num eficien- 
te professor de matemática. 





960 PRINT HT 21,45" DESEJA CONTINUA 6590 PRINT HT 19,163053".0CX"EG-X15"). 

R (S/N)? CRS = NES O! é 

570 INPUT R$ 660 RETURN 

3990 IF R$='"S" THEN GOTO 140 670 PRINT AT 19,16305".(X"5-X15")D. 

990 STOP (CXPUS=RA35")" 

600 CLS 630 RETURN 

610 PRINT AT 6,4:" NAO E POSSIVEL 690 PRINT AT 19,163A:".(X+"!s-X15"! 

FATORBAR " XX! G=)Z5"0)" 

6z0 PRINT AT 8,95” ESTE TRINOMIO * 700 RETURN 

630 PRINT HT 10,45" POIS O DELTA E 710 PRINT AT 19,16405".CX+r!G-XIs") 

NEGATIVO " CAR = Nas 

640 RETURN 740) RETURN 
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